home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue59 / Arch / Sample / UnitObjectEntityOrders.dfm < prev    next >
Encoding:
Text File  |  2000-06-05  |  446 b   |  21 lines
  1. inherited ObjectEntityOrders: TObjectEntityOrders
  2.   Left = 285
  3.   Top = 161
  4.   Height = 479
  5.   Width = 741
  6.   object QueryOrders: TQuery
  7.     DatabaseName = 'DBDEMOS'
  8.     RequestLive = True
  9.     SQL.Strings = (
  10.       'select * from orders.db where (OrderNo = :OrderNo)')
  11.     Left = 76
  12.     Top = 44
  13.     ParamData = <
  14.       item
  15.         DataType = ftInteger
  16.         Name = 'OrderNo'
  17.         ParamType = ptUnknown
  18.       end>
  19.   end
  20. end
  21.